BBS in a Box 10

home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 10 / BBS In A Box Volume X (AMUG) (January 1994).bin / Files / Prog / M / Mini.cpt / mini / InitModem.c < prev next >
MacBinary | 1987-09-20 | 3.4 KB | [TEXT/MPS ]
open in:
MacOS 8.1 extracted |
Win98 extracted |
DOS extracted
view JSON data |
view as text

This file was processed as: MacBinary (archive/macBinary).

You can browse this item here: InitModem.c
Confidence	Program	Detection	Match Type	Support
`66%`	dexvert	Compact Compressed (Unix) `(archive/compact)`	ext	Supported
`10%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`1%`	dexvert	Text File `(text/txt)`	fallback	Supported
`100%`	file	MacBinary II, inited, Sun Sep 20 22:10:59 1987, modified Sun Sep 20 22:10:59 1987, creator 'MPS ', type ASCII, 2819 bytes "InitModem.c" , at 0xb83 382 bytes resource	default (weak)
`99%`	file	data	default
`74%`	TrID	Macintosh plain text (MacBinary)	default
`25%`	TrID	MacBinary 2	default (weak)
`100%`	siegfried	fmt/1762 MacBinary (II)	default
`100%`	lsar	MacBinary	default
id metadata
key	value
macFileType	`[TEXT]`
macFileCreator	`[MPS ]`
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0b 49 6e 69 74 4d 6f | 64 65 6d 2e 63 00 00 00 |..InitMo|dem.c...|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4d 50 53 | 20 01 00 00 00 00 00 00 |.TEXTMPS| .......|
|00000050| 00 00 00 00 00 0b 03 00 | 00 01 7e 9d 7a 3b 33 9d |........|..~.z;3.|
|00000060| 7a 3b 33 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |z;3.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 a2 5a 00 00 |........|.....Z..|
|00000080| 2f 2a 20 6d 6f 64 65 6d | 20 69 6e 69 74 69 61 6c |/* modem| initial|
|00000090| 69 7a 61 74 69 6f 6e 20 | 63 6f 64 65 20 2a 2f 0d |ization |code */.|
|000000a0| 2f 2a 20 4e 65 77 20 66 | 69 6c 65 3a 20 4d 61 79 |/* New f|ile: May|
|000000b0| 20 32 30 2c 31 39 38 37 | 20 0d 09 41 75 74 68 6f | 20,1987| ..Autho|
|000000c0| 72 3a 20 4a 65 72 72 79 | 20 4c 65 56 61 6e 0d 09 |r: Jerry| LeVan..|
|000000d0| 20 20 20 09 09 33 32 35 | 20 42 6f 6f 6e 65 20 54 |   ..325| Boone T|
|000000e0| 72 61 69 6c 0d 09 20 20 | 20 09 09 52 69 63 68 6d |rail..  | ..Richm|
|000000f0| 6f 6e 64 20 4b 79 20 34 | 30 34 37 35 0d 2a 2f 0d |ond Ky 4|0475.*/.|
|00000100| 0d 23 69 6e 63 6c 75 64 | 65 20 3c 74 79 70 65 73 |.#includ|e <types|
|00000110| 2e 68 3e 0d 23 69 6e 63 | 6c 75 64 65 20 3c 73 65 |.h>.#inc|lude <se|
|00000120| 72 69 61 6c 2e 68 3e 0d | 23 69 6e 63 6c 75 64 65 |rial.h>.|#include|
|00000130| 20 3c 64 65 76 69 63 65 | 73 2e 68 3e 0d 23 69 6e | <device|s.h>.#in|
|00000140| 63 6c 75 64 65 20 3c 6d | 65 6e 75 73 2e 68 3e 0d |clude <m|enus.h>.|
|00000150| 23 69 6e 63 6c 75 64 65 | 20 3c 4f 53 55 74 69 6c |#include| <OSUtil|
|00000160| 73 2e 68 3e 0d 23 69 6e | 63 6c 75 64 65 20 3c 6d |s.h>.#in|clude <m|
|00000170| 65 6d 6f 72 79 2e 68 3e | 0d 0d 23 64 65 66 69 6e |emory.h>|..#defin|
|00000180| 65 20 41 49 6e 20 20 2d | 36 0d 23 64 65 66 69 6e |e AIn  -|6.#defin|
|00000190| 65 20 41 4f 75 74 20 2d | 37 0d 0d 65 78 74 65 72 |e AOut -|7..exter|
|000001a0| 6e 20 73 68 6f 72 74 20 | 73 49 6e 3b 09 2f 2a 20 |n short |sIn;./* |
|000001b0| 69 6e 70 75 74 20 72 65 | 66 6e 75 6d 20 2a 2f 0d |input re|fnum */.|
|000001c0| 65 78 74 65 72 6e 20 73 | 68 6f 72 74 20 73 4f 75 |extern s|hort sOu|
|000001d0| 74 3b 09 2f 2a 20 6f 75 | 74 70 75 74 20 72 65 66 |t;./* ou|tput ref|
|000001e0| 6e 75 6d 20 2a 2f 0d 0d | 50 74 72 20 73 65 72 69 |num */..|Ptr seri|
|000001f0| 61 6c 42 75 66 66 50 74 | 72 3b 0d 0d 76 6f 69 64 |alBuffPt|r;..void|
|00000200| 20 46 6c 6f 77 43 6f 6e | 74 72 6f 6c 28 72 65 66 | FlowCon|trol(ref|
|00000210| 6e 75 6d 2c 78 6f 6e 66 | 6c 61 67 29 20 20 2f 2a |num,xonf|lag)  /*|
|00000220| 20 70 72 6f 63 65 73 73 | 20 78 6f 66 66 2f 78 6f | process| xoff/xo|
|00000230| 6e 20 70 72 6f 63 65 73 | 73 69 6e 67 20 2a 2f 0d |n proces|sing */.|
|00000240| 20 73 68 6f 72 74 20 72 | 65 66 6e 75 6d 3b 0d 20 | short r|efnum;. |
|00000250| 63 68 61 72 20 78 6f 6e | 66 6c 61 67 3b 0d 20 7b |char xon|flag;. {|
|00000260| 20 53 65 72 53 68 6b 20 | 66 6c 61 67 73 3b 20 2f | SerShk |flags; /|
|00000270| 2a 20 68 61 6e 64 73 68 | 61 6b 65 20 66 6c 61 67 |* handsh|ake flag|
|00000280| 73 20 2a 2f 0d 20 20 20 | 4f 53 45 72 72 20 65 72 |s */.   |OSErr er|
|00000290| 72 3b 0d 20 09 20 66 6c | 61 67 73 2e 66 58 4f 6e |r;. . fl|ags.fXOn|
|000002a0| 20 3d 20 78 6f 6e 66 6c | 61 67 3b 0d 09 20 66 6c | = xonfl|ag;.. fl|
|000002b0| 61 67 73 2e 66 43 54 53 | 20 3d 20 28 63 68 61 72 |ags.fCTS| = (char|
|000002c0| 29 66 61 6c 73 65 3b 0d | 09 20 66 6c 61 67 73 2e |)false;.|. flags.|
|000002d0| 78 4f 6e 20 20 3d 20 30 | 78 31 31 3b 0d 09 20 66 |xOn  = 0|x11;.. f|
|000002e0| 6c 61 67 73 2e 78 4f 66 | 66 20 3d 20 30 78 31 33 |lags.xOf|f = 0x13|
|000002f0| 3b 20 20 2f 2a 20 78 6f | 66 66 20 63 68 61 72 20 |;  /* xo|ff char |
|00000300| 2a 2f 0d 09 20 66 6c 61 | 67 73 2e 65 72 72 73 20 |*/.. fla|gs.errs |
|00000310| 3d 20 30 20 3b 0d 09 20 | 66 6c 61 67 73 2e 65 76 |= 0 ;.. |flags.ev|
|00000320| 74 73 20 3d 20 30 3b 0d | 09 20 66 6c 61 67 73 2e |ts = 0;.|. flags.|
|00000330| 66 49 6e 58 20 3d 20 78 | 6f 6e 66 6c 61 67 3b 0d |fInX = x|onflag;.|
|00000340| 09 20 66 6c 61 67 73 2e | 66 44 54 52 20 3d 20 28 |. flags.|fDTR = (|
|00000350| 63 68 61 72 29 66 61 6c | 73 65 3b 0d 09 20 69 66 |char)fal|se;.. if|
|00000360| 28 65 72 72 20 3d 20 53 | 65 72 48 53 68 61 6b 65 |(err = S|erHShake|
|00000370| 28 72 65 66 6e 75 6d 2c | 26 66 6c 61 67 73 29 29 |(refnum,|&flags))|
|00000380| 0d 09 20 20 20 45 72 72 | 6f 72 4d 65 73 73 61 67 |..   Err|orMessag|
|00000390| 65 28 22 45 72 72 6f 72 | 20 53 65 74 74 69 6e 67 |e("Error| Setting|
|000003a0| 20 58 4f 4e 2f 58 4f 46 | 46 22 2c 65 72 72 29 3b | XON/XOF|F",err);|
|000003b0| 0d 20 20 7d 0d 20 0d 76 | 6f 69 64 20 49 6e 69 74 |.  }. .v|oid Init|
|000003c0| 4d 6f 64 65 6d 28 77 68 | 69 63 68 50 6f 72 74 2c |Modem(wh|ichPort,|
|000003d0| 63 6f 6e 66 69 67 29 0d | 20 20 53 50 6f 72 74 53 |config).|  SPortS|
|000003e0| 65 6c 20 77 68 69 63 68 | 50 6f 72 74 3b 20 20 20 |el which|Port;   |
|000003f0| 2f 2a 20 6d 6f 64 65 6d | 20 6f 72 20 70 68 6f 6e |/* modem| or phon|
|00000400| 65 20 2a 2f 0d 20 20 73 | 68 6f 72 74 20 63 6f 6e |e */.  s|hort con|
|00000410| 66 69 67 3b 09 09 09 2f | 2a 20 63 6f 6e 66 69 67 |fig;.../|* config|
|00000420| 75 72 61 74 69 6f 6e 20 | 64 61 74 61 20 2a 2f 0d |uration |data */.|
|00000430| 20 20 0d 20 20 7b 20 4f | 53 45 72 72 20 65 72 72 |  .  { O|SErr err|
|00000440| 3b 20 20 20 2f 2a 20 65 | 72 72 6f 72 20 63 6f 64 |;   /* e|rror cod|
|00000450| 65 20 72 65 74 75 72 6e | 65 64 20 62 79 20 4f 53 |e return|ed by OS|
|00000460| 20 2a 2f 0d 20 20 20 20 | 53 65 72 53 68 6b 20 66 | */.    |SerShk f|
|00000470| 6c 61 67 73 3b 20 2f 2a | 20 6d 6f 64 65 6d 20 63 |lags; /*| modem c|
|00000480| 68 61 72 61 63 74 65 72 | 69 73 74 69 63 73 20 2a |haracter|istics *|
|00000490| 2f 0d 09 0d 20 20 20 20 | 2f 2a 20 73 74 65 70 20 |/...    |/* step |
|000004a0| 6f 6e 65 20 2e 2e 20 4f | 70 65 6e 20 74 68 65 20 |one .. O|pen the |
|000004b0| 64 72 69 76 65 72 20 2a | 2f 0d 20 20 20 20 69 66 |driver *|/.    if|
|000004c0| 28 65 72 72 3d 52 41 4d | 53 44 4f 70 65 6e 28 77 |(err=RAM|SDOpen(w|
|000004d0| 68 69 63 68 50 6f 72 74 | 29 29 7b 0d 09 20 20 20 |hichPort|)){..   |
|000004e0| 45 72 72 6f 72 4d 65 73 | 73 61 67 65 28 22 43 61 |ErrorMes|sage("Ca|
|000004f0| 6e 27 74 20 4f 70 65 6e | 20 52 61 6d 20 53 65 72 |n't Open| Ram Ser|
|00000500| 69 61 6c 20 44 72 69 76 | 65 72 22 2c 65 72 72 29 |ial Driv|er",err)|
|00000510| 3b 0d 09 20 20 20 72 65 | 74 75 72 6e 20 3b 0d 09 |;..   re|turn ;..|
|00000520| 20 20 7d 0d 09 2f 2a 20 | 73 74 65 70 20 74 77 6f |  }../* |step two|
|00000530| 20 2e 2e 2e 20 43 6f 6e | 66 69 67 75 72 65 20 74 | ... Con|figure t|
|00000540| 68 65 20 6d 6f 64 65 6d | 20 2a 2f 0d 09 69 66 28 |he modem| */..if(|
|00000550| 65 72 72 3d 53 65 72 52 | 65 73 65 74 28 73 4f 75 |err=SerR|eset(sOu|
|00000560| 74 2c 63 6f 6e 66 69 67 | 29 29 7b 0d 09 20 20 20 |t,config|)){..   |
|00000570| 45 72 72 6f 72 4d 65 73 | 73 61 67 65 28 22 43 61 |ErrorMes|sage("Ca|
|00000580| 6e 27 74 20 43 6f 6e 66 | 69 67 75 72 65 20 4f 75 |n't Conf|igure Ou|
|00000590| 74 70 75 74 20 50 6f 72 | 74 22 2c 65 72 72 29 3b |tput Por|t",err);|
|000005a0| 0d 09 20 20 20 72 65 74 | 75 72 6e 3b 0d 09 20 20 |..   ret|urn;..  |
|000005b0| 7d 0d 09 2f 2a 20 73 74 | 65 70 20 74 68 72 65 65 |}../* st|ep three|
|000005c0| 2e 2e 2e 6e 6f 77 20 74 | 68 65 20 69 6e 70 75 74 |...now t|he input|
|000005d0| 20 73 69 64 65 20 2a 2f | 0d 09 69 66 28 65 72 72 | side */|..if(err|
|000005e0| 3d 53 65 72 52 65 73 65 | 74 28 73 49 6e 2c 63 6f |=SerRese|t(sIn,co|
|000005f0| 6e 66 69 67 29 29 7b 0d | 09 20 20 20 45 72 72 6f |nfig)){.|.   Erro|
|00000600| 72 4d 65 73 73 61 67 65 | 28 22 43 61 6e 27 74 20 |rMessage|("Can't |
|00000610| 43 6f 6e 66 69 67 75 72 | 65 20 49 6e 70 75 74 20 |Configur|e Input |
|00000620| 50 6f 72 74 22 2c 65 72 | 72 29 3b 0d 09 20 20 20 |Port",er|r);..   |
|00000630| 72 65 74 75 72 6e 3b 0d | 09 20 20 7d 0d 09 20 2f |return;.|.  }.. /|
|00000640| 2a 20 73 74 65 70 20 66 | 6f 75 72 2e 2e 2e 73 65 |* step f|our...se|
|00000650| 74 20 6f 74 68 65 72 20 | 75 73 65 66 75 6c 20 63 |t other |useful c|
|00000660| 68 61 72 61 63 74 65 72 | 69 73 74 69 63 73 20 2a |haracter|istics *|
|00000670| 2f 0d 09 20 66 6c 61 67 | 73 2e 66 58 4f 6e 20 3d |/.. flag|s.fXOn =|
|00000680| 20 28 63 68 61 72 29 74 | 72 75 65 3b 0d 09 20 66 | (char)t|rue;.. f|
|00000690| 6c 61 67 73 2e 66 43 54 | 53 20 3d 20 28 63 68 61 |lags.fCT|S = (cha|
|000006a0| 72 29 66 61 6c 73 65 3b | 0d 09 20 66 6c 61 67 73 |r)false;|.. flags|
|000006b0| 2e 78 4f 6e 20 20 3d 20 | 30 78 31 31 3b 0d 09 20 |.xOn  = |0x11;.. |
|000006c0| 66 6c 61 67 73 2e 78 4f | 66 66 20 3d 20 30 78 31 |flags.xO|ff = 0x1|
|000006d0| 33 3b 20 20 2f 2a 20 78 | 6f 66 66 20 63 68 61 72 |3;  /* x|off char|
|000006e0| 20 2a 2f 0d 09 20 66 6c | 61 67 73 2e 65 72 72 73 | */.. fl|ags.errs|
|000006f0| 20 3d 20 30 20 3b 0d 09 | 20 66 6c 61 67 73 2e 65 | = 0 ;..| flags.e|
|00000700| 76 74 73 20 3d 20 30 3b | 0d 09 20 66 6c 61 67 73 |vts = 0;|.. flags|
|00000710| 2e 66 49 6e 58 20 3d 20 | 28 63 68 61 72 29 74 72 |.fInX = |(char)tr|
|00000720| 75 65 3b 0d 09 20 66 6c | 61 67 73 2e 66 44 54 52 |ue;.. fl|ags.fDTR|
|00000730| 20 3d 20 28 63 68 61 72 | 29 66 61 6c 73 65 3b 0d | = (char|)false;.|
|00000740| 09 20 69 66 28 65 72 72 | 20 3d 20 53 65 72 48 53 |. if(err| = SerHS|
|00000750| 68 61 6b 65 28 73 4f 75 | 74 2c 26 66 6c 61 67 73 |hake(sOu|t,&flags|
|00000760| 29 29 7b 0d 09 20 20 20 | 45 72 72 6f 72 4d 65 73 |)){..   |ErrorMes|
|00000770| 73 61 67 65 28 22 45 72 | 72 6f 72 20 53 65 74 74 |sage("Er|ror Sett|
|00000780| 69 6e 67 20 58 4f 4e 2f | 58 4f 46 46 22 2c 65 72 |ing XON/|XOFF",er|
|00000790| 72 29 3b 0d 09 20 20 20 | 72 65 74 75 72 6e 3b 0d |r);..   |return;.|
|000007a0| 09 20 20 7d 0d 09 20 2f | 2a 20 73 74 65 70 20 35 |.  }.. /|* step 5|
|000007b0| 20 2e 2e 2e 73 65 74 20 | 61 20 6c 61 72 67 65 72 | ...set |a larger|
|000007c0| 20 69 6e 70 75 74 20 62 | 75 66 66 65 72 20 66 6f | input b|uffer fo|
|000007d0| 72 20 68 69 67 68 65 72 | 20 73 70 65 65 64 73 20 |r higher| speeds |
|000007e0| 2a 2f 0d 09 20 0d 09 20 | 73 65 72 69 61 6c 42 75 |*/.. .. |serialBu|
|000007f0| 66 66 50 74 72 20 3d 20 | 4e 65 77 50 74 72 28 31 |ffPtr = |NewPtr(1|
|00000800| 32 30 30 29 3b 0d 09 20 | 53 65 72 53 65 74 42 75 |200);.. |SerSetBu|
|00000810| 66 28 73 49 6e 2c 73 65 | 72 69 61 6c 42 75 66 66 |f(sIn,se|rialBuff|
|00000820| 50 74 72 2c 31 32 30 30 | 29 3b 0d 0d 20 20 20 7d |Ptr,1200|);..   }|
|00000830| 0d 2f 2a 20 74 68 65 20 | 6e 65 77 20 70 68 6f 6e |./* the |new phon|
|00000840| 65 20 6d 61 6e 61 67 65 | 72 20 6d 61 6b 65 73 20 |e manage|r makes |
|00000850| 74 68 69 73 20 72 6f 75 | 74 69 6e 65 20 6f 62 73 |this rou|tine obs|
|00000860| 6f 6c 65 74 65 20 2a 2f | 20 20 20 0d 76 6f 69 64 |olete */|   .void|
|00000870| 20 44 69 61 6c 28 72 65 | 66 6e 75 6d 2c 69 74 65 | Dial(re|fnum,ite|
|00000880| 6d 4e 75 6d 62 65 72 2c | 6d 65 6e 75 48 29 0d 20 |mNumber,|menuH). |
|00000890| 20 20 73 68 6f 72 74 20 | 72 65 66 6e 75 6d 3b 20 |  short |refnum; |
|000008a0| 20 20 09 09 2f 2a 20 6f | 75 74 70 75 74 20 64 65 |  ../* o|utput de|
|000008b0| 76 69 63 65 20 2a 2f 0d | 20 20 20 73 68 6f 72 74 |vice */.|   short|
|000008c0| 20 69 74 65 6d 4e 75 6d | 62 65 72 3b 09 2f 2a 20 | itemNum|ber;./* |
|000008d0| 6d 65 6e 75 69 74 65 6d | 20 6e 75 6d 62 65 72 20 |menuitem| number |
|000008e0| 2a 2f 0d 20 20 20 4d 65 | 6e 75 48 61 6e 64 6c 65 |*/.   Me|nuHandle|
|000008f0| 20 6d 65 6e 75 48 3b 09 | 2f 2a 20 74 68 65 20 50 | menuH;.|/* the P|
|00000900| 68 6f 6e 65 20 6d 65 6e | 75 20 2a 2f 0d 20 20 20 |hone men|u */.   |
|00000910| 7b 20 63 68 61 72 20 6e | 61 6d 65 5b 34 30 5d 3b |{ char n|ame[40];|
|00000920| 09 2f 2a 20 73 74 6f 72 | 61 67 65 20 66 6f 72 20 |./* stor|age for |
|00000930| 70 68 6f 6e 65 20 6e 75 | 6d 62 65 72 20 2a 2f 0d |phone nu|mber */.|
|00000940| 20 20 20 20 20 6c 6f 6e | 67 20 6c 65 6e 3b 09 09 |     lon|g len;..|
|00000950| 09 2f 2a 20 6c 65 6e 67 | 74 68 20 6f 66 20 70 68 |./* leng|th of ph|
|00000960| 6f 6e 65 20 6e 75 6d 62 | 65 72 20 2a 2f 0d 09 20 |one numb|er */.. |
|00000970| 6c 6f 6e 67 20 74 77 6f | 2c 74 6d 70 3b 09 09 2f |long two|,tmp;../|
|00000980| 2a 20 74 65 6d 70 20 73 | 74 6f 72 61 67 65 20 2a |* temp s|torage *|
|00000990| 2f 0d 09 20 48 61 6e 64 | 6c 65 20 6e 75 6d 62 65 |/.. Hand|le numbe|
|000009a0| 72 3b 09 09 2f 2a 20 68 | 61 6e 64 6c 65 20 74 6f |r;../* h|andle to|
|000009b0| 20 74 68 65 20 6e 75 6d | 62 65 72 20 2a 2f 0d 09 | the num|ber */..|
|000009c0| 20 63 68 61 72 20 2a 70 | 74 72 3b 09 09 09 2f 2a | char *p|tr;.../*|
|000009d0| 20 6b 6c 75 64 67 65 20 | 2a 2f 0d 09 20 0d 09 20 | kludge |*/.. .. |
|000009e0| 47 65 74 49 74 65 6d 28 | 6d 65 6e 75 48 2c 69 74 |GetItem(|menuH,it|
|000009f0| 65 6d 4e 75 6d 62 65 72 | 2c 6e 61 6d 65 29 3b 0d |emNumber|,name);.|
|00000a00| 09 20 6e 75 6d 62 65 72 | 20 3d 20 28 48 61 6e 64 |. number| = (Hand|
|00000a10| 6c 65 29 47 65 74 4e 61 | 6d 65 64 52 65 73 6f 75 |le)GetNa|medResou|
|00000a20| 72 63 65 28 27 44 49 41 | 4c 27 2c 6e 61 6d 65 29 |rce('DIA|L',name)|
|00000a30| 3b 0d 09 20 48 4c 6f 63 | 6b 28 6e 75 6d 62 65 72 |;.. HLoc|k(number|
|00000a40| 29 3b 0d 09 20 2f 2a 20 | 63 6f 6d 70 75 74 65 20 |);.. /* |compute |
|00000a50| 6c 65 6e 67 74 68 20 6f | 66 20 6e 75 6d 62 65 72 |length o|f number|
|00000a60| 20 2a 2f 0d 09 20 6c 65 | 6e 20 3d 20 30 3b 0d 09 | */.. le|n = 0;..|
|00000a70| 20 77 68 69 6c 65 28 28 | 2a 6e 75 6d 62 65 72 29 | while((|*number)|
|00000a80| 5b 6c 65 6e 5d 29 6c 65 | 6e 2b 2b 3b 0d 09 20 2f |[len])le|n++;.. /|
|00000a90| 2a 20 75 73 65 20 48 61 | 79 65 73 20 41 54 20 63 |* use Ha|yes AT c|
|00000aa0| 6f 6d 6d 61 6e 64 73 20 | 2a 2f 0d 09 20 74 77 6f |ommands |*/.. two|
|00000ab0| 20 3d 20 32 3b 0d 09 20 | 46 53 57 72 69 74 65 28 | = 2;.. |FSWrite(|
|00000ac0| 72 65 66 6e 75 6d 2c 26 | 74 77 6f 2c 22 41 54 22 |refnum,&|two,"AT"|
|00000ad0| 29 3b 20 44 65 6c 61 79 | 28 32 30 2c 26 74 6d 70 |); Delay|(20,&tmp|
|00000ae0| 29 3b 0d 09 20 74 77 6f | 20 3d 32 3b 0d 09 20 46 |);.. two| =2;.. F|
|00000af0| 53 57 72 69 74 65 28 72 | 65 66 6e 75 6d 2c 26 74 |SWrite(r|efnum,&t|
|00000b00| 77 6f 2c 22 44 54 22 29 | 3b 20 44 65 6c 61 79 28 |wo,"DT")|; Delay(|
|00000b10| 32 30 2c 26 74 6d 70 29 | 3b 0d 09 20 2f 2a 20 61 |20,&tmp)|;.. /* a|
|00000b20| 6e 64 20 6e 6f 77 20 74 | 68 65 20 6e 75 6d 62 65 |nd now t|he numbe|
|00000b30| 72 20 28 63 72 20 69 73 | 20 70 61 72 74 20 6f 66 |r (cr is| part of|
|00000b40| 20 6e 75 6d 62 65 72 29 | 20 2a 2f 0d 09 20 46 53 | number)| */.. FS|
|00000b50| 57 72 69 74 65 28 72 65 | 66 6e 75 6d 2c 26 6c 65 |Write(re|fnum,&le|
|00000b60| 6e 2c 2a 6e 75 6d 62 65 | 72 29 3b 0d 09 20 48 55 |n,*numbe|r);.. HU|
|00000b70| 6e 6c 6f 63 6b 28 6e 75 | 6d 62 65 72 29 3b 0d 20 |nlock(nu|mber);. |
|00000b80| 20 20 7d 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |  }.....|........|
|00000b90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ba0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000bb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000bc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000bd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000be0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000bf0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c00| 00 00 01 00 00 00 01 4c | 00 00 00 4c 00 00 00 32 |.......L|...L...2|
|00000c10| 38 20 26 2e 00 0c 24 2e | 00 10 4a ae 00 08 6c 08 |8 &...$.|..J...l.|
|00000c20| 42 a7 48 78 00 16 60 46 | 48 6e 00 08 4e ba 00 e4 |B.Hx..`F|Hn..N...|
|00000c30| 1a 31 2e 20 44 44 45 78 | 70 61 6e 64 45 78 70 61 |.1. DDEx|pandExpa|
|00000c40| 6e 64 54 65 6d 70 46 69 | 6c 65 20 78 02 00 00 00 |ndTempFi|le x....|
|00000c50| 00 00 44 44 54 4d 44 44 | 41 50 01 00 00 00 00 00 |..DDTMDD|AP......|
|00000c60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c70| 00 00 a5 f4 97 87 00 00 | 0b 03 00 00 01 7e 04 1c |........|.....~..|
|00000c80| ff f0 4e 5e 4e 75 d2 45 | 41 44 20 20 20 20 4e 56 |..N^Nu.E|AD    NV|
|00000c90| 00 00 48 e7 38 20 26 2e | 00 0c 24 2e 00 10 4a ae |..H.8 &.|..$...J.|
|00000ca0| 00 08 6c 08 42 a7 48 78 | 00 16 60 46 48 6e 00 08 |..l.B.Hx|..`FHn..|
|00000cb0| 4e ba 00 60 24 40 28 0a | 66 04 70 ff 60 42 08 2a |N..`$@(.|f.p.`B.*|
|00000cc0| 00 01 00 01 66 08 42 a7 | 48 78 00 09 60 24 25 42 |....f.B.|Hx..`$%B|
|00000cd0| 00 0c 25 43 00 10 2f 0a | 20 6a 00 04 20 68 00 10 |..%C../.| j.. h..|
|00000ce0| 4e 90 22 00 4a 81 67 12 | 30 2a 00 02 48 c0 2f 00 |N.".J.g.|0*..H./.|
|00000cf0| 2f 01 4e ba 03 38 70 ff | 60 06 20 02 90 aa 00 0c |/.N..8p.|`. .....|
|00000d00| 00 00 00 48 00 09 4d 6f | 6e 61 63 6f 00 39 38 37 |...H..Mo|naco.987|
|00000d10| 20 4a 65 72 72 79 20 4c | 65 56 61 6e 20 2a 2f 0d | Jerry L|eVan */.|
|00000d20| 0d 23 69 6e 63 6c 00 06 | 00 04 00 3c 00 24 01 53 |.#incl..|...<.$.S|
|00000d30| 01 fd 00 3c 00 24 01 53 | 01 fd 9d 79 f4 e3 00 00 |...<.$.S|...y....|
|00000d40| 07 ab 00 00 07 ab 00 00 | 05 59 01 00 00 00 01 00 |........|.Y......|
|00000d50| 00 00 01 4c 00 00 00 4c | 00 00 00 32 00 01 67 3e |...L...L|...2..g>|
|00000d60| 02 f2 00 00 00 1c 00 32 | 00 00 4d 50 53 52 00 00 |.......2|..MPSR..|
|00000d70| 00 0a 03 ed ff ff 00 00 | 00 00 00 02 69 94 00 00 |........|....i...|
+--------+-------------------------+-------------------------+--------+--------+